home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-05-20 | 2.0 KB | 105 lines | [TEXT/MPS ] |
- #include "Types.r"
-
- /* Number of Kinds of Rsrcs and Counts of Specific rsrcs. */
-
- /*------???? • Resource Count Information Template-------*/
- type '????' {
- wide array RKEYlist { /* List of items */
- longint; /* Resource type */
- integer; /* Resource Number */
- };
- };
-
-
- /* Total Count of Code Resources & Total Count of Resource
- Types as a Virus Detection aid. */
- resource '????' (32) {
- {
- /* (Substitute your own values in this resource) */
- 0, 5; /* # of kinds of Resources */
- 'CODE', 4; /* number of 'CODE' resources */
- 'MDEF', 1; /* number of 'MDEF' resources */
- }
- };
-
-
-
- /* Virus Alert! */
- resource 'ALRT' (1282, purgeable) {
- {100, 120, 305, 460},
- 1282,
- { /* array: 4 elements */
- /* [1] */
- OK, visible, sound1,
- /* [2] */
- OK, visible, sound1,
- /* [3] */
- OK, visible, sound1,
- /* [4] */
- OK, visible, sound1
- }
- };
-
- resource 'DITL' (1282, purgeable) {
- { /* array DITLarray: 2 elements */
- /* [1] */
- {160, 150, 180, 210},
- Button {
- enabled,
- "OK"
- },
- /* [2] */
- {15, 65, 150, 325},
- StaticText {
- disabled,
- "!!! Virus Alert !!!\nApplication has detected a "
- "miscount of ^0, possibly caused by being infected"
- " with a Virus. Run a Virus Protection Program aga"
- "inst your System and this copy of the Application"
- " and/or reinstall the Application."
- }
- }
- };
-
- /* Virus Not Found Alert! */
- resource 'ALRT' (1283, purgeable) {
- {100, 120, 195, 350},
- 1283,
- { /* array: 4 elements */
- /* [1] */
- OK, visible, sound1,
- /* [2] */
- OK, visible, sound1,
- /* [3] */
- OK, visible, sound1,
- /* [4] */
- OK, visible, sound1
- }
- };
-
- resource 'DITL' (1283, purgeable) {
- { /* array DITLarray: 2 elements */
- /* [1] */
- {60, 90, 80, 150},
- Button {
- enabled,
- "OK"
- },
- /* [2] */
- {15, 65, 45, 205},
- StaticText {
- disabled,
- "All is well!"
- }
- }
- };
-
- /* Substitution strings to go in ^0 in the above dialog */
- resource 'STR#' (1282, purgeable) {
- {
- "its ‘????’ Resource"; /* (Use the count Rsrc. kind) */
- "all its Resource Types";
- "its ‘^1’ Resources"
- }
- };
-